setdisplay(320,240,32,1):paper(0xFFFFFF):ink(0x000000):pen(0x000000):cls
prints("type what you want, and press enter")
paper(0xCCCCCC):a$=zoneinputs(7,10,5,"?")
paper(0xFFFFFF):cls
fprints("you typed: "):prints(a$):prints("")
waitKey(k_esc)
